REQUIRE "III2DD[SUB,SYS]" LOAD_MODULE;
EXTERNAL PROCEDURE DDREST;
REQUIRE DDREST INITIALIZATION;
EXTERNAL INTEGER GFSIZX,GFSIZY,GFSIZL,X0,Y0,SCALX,SCALY,XCENT,YCENT,LMAR,RMAR,YBOT,CHSCAL;
EXTERNAL INTEGER DDPOSX,DDPOSY,DDGCHN;
EXTERNAL INTEGER DDPAR0,DDPARN;
EXTERNAL REAL CHASP,ASPECT,SQALE;
EXTERNAL PROCEDURE IIISUB(INTEGER ARRAY DPYBUF;INTEGER DDCHAN);
EXTERNAL PROCEDURE IIICVT(INTEGER ARRAY DPYBUF);